# We assume that the `id` column identifies individual articles, but the replication file, online appendix, and article do not seem to include a mapping between those ids and article references/bibliographies.

source(here::here("code/load.R"))

here("data/meta_analyses_raw/YesYes2019/coresample.dta") |>
  read_dta() |>
  mutate(id = as.character(id),
         meta_id = "YesYes2019",
         subfield = "IR",
         question = "What is the effect of military expenditures on growth?",
         overall_effect = "yes") |>
  select(meta_id,
         study_id = id,
         subfield,
         question,
         estimate = PCC,
         std.error = Computed_standard_error,
         overall_effect) |>
  write_csv(here("data/meta_analyses_clean/YesYes2019.csv"))
